(set-frame-font): Renamed from set-default-font,

diff --git a/lisp/frame.el b/lisp/frame.el
index c97a6d3ab7fa026efffc9574ac3e2fd844f2b40c..80c903b5795f1eed3459fb4dbdb323fcd7f6ed75 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -583,7 +583,8 @@ If FRAME is omitted, describe the currently selected frame."
 If FRAME is omitted, describe the currently selected frame."
   (cdr (assq 'width (frame-parameters frame))))
 
-(defun set-default-font (font-name)
+(defalias 'set-default-font 'set-frame-font)
+(defun set-frame-font (font-name)
   "Set the font of the selected frame to FONT.
 When called interactively, prompt for the name of the font to use.
 To get the frame's current default font, use `frame-parameters'."